home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (DO) / Softdisk Magazette Volume 2, No. 04 (1982-12)(Softdisk)(Side A).zip / Softdisk Magazette Volume 2, No. 04 (1982-12)(Softdisk)(Side A).do / PAL.50060.WOODY.NOV.82.B.bas < prev    next >
BASIC Source File  |  1996-12-24  |  2KB  |  30 lines
  1. 10 B$ = "YUKON COMPUTER PRODUCTS":C$ = "PRESS ANY KEY TO CONTINUE."
  2. 20  TEXT : HOME : HTAB 8: PRINT B$: PRINT : PRINT 
  3. 30  PRINT "I LIVE 75 MILES FROM THE NEAREST": PRINT 
  4. 40  PRINT "COMPUTER STORE, SO I'M ALWAYS ON THE": PRINT 
  5. 50  PRINT "LOOKOUT FOR A MAIL ORDER COMPANY THAT": PRINT 
  6. 60  PRINT "REALLY DELIVERS.": PRINT : PRINT 
  7. 70  PRINT "I'VE FOUND ONE!!!!"
  8. 80  VTAB 23: PRINT C$;: GET A$
  9. 90  HOME : HTAB 8: PRINT B$: PRINT : PRINT 
  10. 100  PRINT "I MAILED A PERSONAL CHECK (NOT A": PRINT 
  11. 110  PRINT "CASHIER'S CHECK, A CERTIFED CHECK, OR": PRINT 
  12. 120  PRINT "A MONEY ORDER, BUT A PERSONAL CHECK)": PRINT 
  13. 130  PRINT "TO YUKON COMPUTER PRODUCTS ON A MONDAY.": PRINT 
  14. 140  PRINT "ACCORDING TO THE PACKING LIST WHEN I": PRINT 
  15. 150  PRINT "RECIEVED MY MERCHANDISE (BLANK DISKS)": PRINT 
  16. 160  PRINT "THE ORDER HAD BEEN WRITTEN UP ON ": PRINT 
  17. 170  PRINT "WEDNESDAY OF THAT SAME WEEK, AND I GOT": PRINT 
  18. 180  PRINT "MY DISKS BY UPS FRIDAY THAT SAME WEEK!!": PRINT 
  19. 200  VTAB 23: PRINT C$;: GET A$
  20. 210  HOME : HTAB 8: PRINT B$: PRINT : PRINT 
  21. 220  PRINT "TALK ABOUT SERVICE!!! 5 DAYS TO MAIL": PRINT 
  22. 230  PRINT "THE ORDER TO YUKON AND HAVE IT BACK": PRINT 
  23. 240  PRINT "TO ME ON UPS!!! AND NO DELIVERY CHARGE!": PRINT 
  24. 250  PRINT "THIS IS A COMPANY THAT IS CONCERNED": PRINT 
  25. 260  PRINT "WITH SERVING THE CUSTOMER!! AND THAT'S": PRINT 
  26. 270  PRINT "VERY RARE NOW. I THOUGHT YOU SOFT PALS": PRINT 
  27. 280  PRINT "WOULD BE INTERESTED."
  28. 290  VTAB 23: PRINT C$;: GET A$
  29. 300  PRINT 
  30. 310  PRINT  CHR$(4);"RUN PAL.MENU"